home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / scheme / pcscheme / ti / pcscm3_3 / pkdisk2.arc / PDOS.FSL < prev    next >
Encoding:
Text File  |  1988-06-07  |  3.2 KB  |  60 lines
  1. #!fast-load  (C) Copyright 1988 by Texas Instruments
  2. #!fast-load            All Rights Reserved.
  3. h0031 0853
  4. x07DOS-DIR
  5. x08DOS-CALL
  6. x06SW-INT
  7. x0ADOS-DELETE
  8. x0CCOMPARE-SPEC
  9. x0ASTRIP-PATH
  10. x0DDOS-FILE-COPY
  11. x07GET-DIR
  12. x09RESET-DIR
  13. x0ADOS-RENAME
  14. x0DDOS-FILE-SIZE
  15. x09DOS-CHDIR
  16. x10DOS-CHANGE-DRIVE
  17. x0FERROR-PROCEDURE
  18. s0028DOS-CHANGE-DRIVE: Must specify a string!
  19. s0025DOS-CHDIR: Argument must be a string!
  20. s0000
  21. x0CFILE-EXISTS?
  22. s0023DOS-FILE-SIZE: File does not exist!
  23. s0025DOS-FILE-SIZE: Must specify a string!
  24. s0024DOS-RENAME: Destination file exists!
  25. s0027DOS-RENAME: Source file does not exist!
  26. s0022DOS-RENAME: Must specify a string!
  27. lnlnn
  28. s0001 
  29. c3A
  30. c5C
  31. c20
  32. c61
  33. c6A
  34. s0023DOS-FILE-COPY: File does not exist!
  35. s0025DOS-FILE-COPY: Must specify a string!
  36. s0020DOS-DELETE: File does not exist!
  37. s0022DOS-DELETE: Must specify a string!
  38. x1B%ERROR-INVALID-OPERAND-LIST
  39. i00FF
  40. x16%ERROR-INVALID-OPERAND
  41. x0CSTRING-NULL?
  42. x0BSTRING-CI=?
  43. s0004.COM
  44. s0004.EXE
  45. x0CLIST->STRING
  46. s0004x/c 
  47. c0D
  48. s0001x
  49. x11WINDOW-GET-CURSOR
  50. x07CONSOLE
  51. x12WINDOW-SET-CURSOR!
  52. s0001.
  53. t<⌡<l <º <Q<∙<┬<╦<█<í    <┌    
  54. <ä
  55.  <<   <  ;Å"
  56. ⁿΘⁿⁿ;
  57.  4;"*@Å"
  58. @  Θ;
  59.  4; Θ ;Å".4"
  60.  Θ ;
  61.  4;
  62.  4; Å "  Å # ö4 " q  ╞ 4  4 4"
  63.  4 4 Ω 4;
  64.  4;
  65.  4; f ê"@ 4C 5; ºa#┴  4 º  _"╟f" º  4_"5Q ⁿ╟ⁿⁿf"Q■ⁿ╟ⁿⁿfê"Q  ╚  4  x ; Å "  Å # ─4 # á ╞ f " P ╟ f " > ╟  ├ ê " $ ╟  ├$ ┴ " .  4  ╞(╞(, ╓,(   Ω;
  66.  4;
  67.  4;╞  4  ╞ⁿ ºⁿⁿ; _ " 1 Q  ⁿ╟ⁿ ⁿ┴ ê "  Q  ⁿ╟ⁿ ⁿ┴ ê " Q  5 ;Å".4"
  68. 
  69.  Θ ;
  70.   4;
  71. ! 4;@C E"I M"N EE" EE@ E E  A " E E  C   Ñ $ⁿ$\ⁿ  ⁿ" 
  72.  O  $"9$  _ ê "  #\ ê " ' \  "  ($ (5   ε ; $5 "@  " C " C   E"I EÑ^"EC ╨ Å # é  Å # y $%$4 $$$E 0╟  &'4 $($($$0½  &(4 (,",,((,$$(  $ # s$ e $" 
  73. ╘ ╙  ($e$(#$¢($ e$("$<  $á$(
  74. á($x()4$  !P,*0*╞04@ ╞@D$,╓$40 D@(,+╔(,0$╞04@(╞@D╓$40(D@( ╞(Q(á(,╚$,(!M,,0,╞04@ ╞@D$,╓$40 D@(,+╔(,0$╞04@(╞@D╓$40(D@( ╞(á(,╚$,(,Ü,∞ $,($e$("$J  -.4(.╙(@A /.4(,╒(,   ; ; ╞ 0╬  "
  75. ╞º;;Å"!Θ " 0 O; ;$ 5 Φ"0ε  O ;;
  76. z
  77.